namespace MessageBroker

import System
import System.Collections

class Message:
"""Description of Message"""

	[property(Id)]
	id as string
	
	[property(TimeStamp)]
	timeStamp as DateTime

	[property(Subject)]
	subject as string

	[property(Body)]
	body as object

	[property(Attachments)]
	attachments as IList

	[property(SentTo)]
	sentTo as string

	[property(SentFrom)]
	sentFrom as string	
	
	[property(InReplyTo)]
	inReplyTo as Message

	def constructor():
		pass

	def CreateReply() as Message:
		return Message(InReplyTo: self)
		
